(change-log-name): Let default name for ms-dos be "change.log".

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 0978e45ac6b6596c06c53f77ddd8dc4a05dc84ba..acb789bb52ad25feccf523ff97758a370eaa0cc3 100644 (file)
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -50,7 +50,11 @@ an `@' character, followed by the value returned by `system-name'.")
 
 (defun change-log-name ()
   (or change-log-default-name
-      (if (eq system-type 'vax-vms) "$CHANGE_LOG$.TXT" "ChangeLog")))
+      (if (eq system-type 'vax-vms) 
+         "$CHANGE_LOG$.TXT" 
+       (if (eq system-type 'ms-dos)
+           "change.log"
+         "ChangeLog"))))
 
 ;;;###autoload
 (defun prompt-for-change-log-name ()